home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mobiclic 71
/
MOBICLIC 71.ISO
/
mac
/
DATA
/
COMMUN
/
temp0001
/
00258_Script_GESTION_BTON_PAUSE
< prev
next >
Wrap
Text File
|
2004-12-05
|
787b
|
34 lines
property pdizsprite,pdizspriteNo, pdizguyname
global gpiste_Pause, gpiste_Video, gpiste_GO, gL_EtatBtons
-----------------------------
on beginSprite me
pdizspriteNo = me.spriteNum
pdizsprite = sprite(pdizspriteNo)
pdizguyname = pdizsprite.member.name
gpiste_Pause = pdizspriteNo
end
------------------
on mouseEnter
cursor 280
pdizsprite.member = pdizguyname&"_R"
updateStage
end
-----------------
on mouseLeave
cursor -1
case(gL_EtatBtons[2]) of
0:
puppetSprite pdizspriteNo, FALSE
1:
nothing
end case
updateStage
-------------
on mouseUp
gL_EtatBtons = [0,1,0, 0]
pdizsprite.member = pdizguyname&"_R"
puppetSprite gpiste_Go, FALSE
sprite(gpiste_Video).movieRate = 0
updateStage
end
-------------